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-TITLE BTMEM - Configure and Test 11/8SS Memor 
- LIDENT Marae ft ’ : 
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COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


e ® 
: s 
3 * 
Py ® 
° ® 
3* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
3* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * 
3:* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
3:* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 

3* TRANSFERRED. * 
Ps ® 
3* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
CORPORATION. : 
DIGITAL ASSUMES NO RESPONS . ITY FOR THE USE OR RELIABILITY OF ITS 
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; FACILITY: 


Linked with VMB.EXE - part of the 
bootstrap module for VAX 11/8SS hardware. 


; ENVIRONMENT: 


h 


SOoOoOoOSCOCOSSoOoooooooooooooooooooooooooooo 


Runs at IPL 31, kernel mode, memory management is OFF, IS=1 
(running on interrupt stack), and code must be PIC. 
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; FUNCTIONAL DESCRIPTION: 


This routine is 11/8SS specific and 

determines how many memory controllers are on the system, 
3 where they are, how much memory they control, which pages 
3 of that eoyate? are present (and good). Then the routines 
: ® 


SoOooooo 


set bits in the PFN bitmap to represent each present (and 
good) page of memory. 


As a side effect, the routines store the type of adapter located 
at each bus slot in the RPB. 
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SOoooocoooooooQooQoQoQooooooooooooooooooooooooooooooo 


R7 - address of the SCB 
R11 - address of the RPB 
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IMPLICIT INPUTS: 


The positions on the 11/8SS system bus, the BI, are called nodes, and 
are identified by node numbers §cts° 


BI 1/0 space begins at *x20000000 (512MB), and each node occupies 
an 8KB node space of registers. 


Bl nodes are self pyr dn in that the first register (relative 0) 
in the node space is constrained to be the DEVTYPE register. The 
format of this register is as follows: 


31 16 15 14 8 7 0 


This register is to be interpreted as follows: 
The Device Type field is broken up into three sub-fields. 
The main subd-field of interest here is the one defined 
by bits <14:08>. If this sub®field is zero then this 
node is a BI memory node. All other types of node, 
i.e. processors, adapters, etc., are constrained to 
have non-zero values here. 


The ND field, bit <15>, if non-zero, indicates that the 
node is a non-DEC device. 
OUTPUTS: 


R7, R8, R11, and SP are preserved 
ALC others Cinc Luding AP and FP) are altered 


IMPLICIT OUTPUTS: 
The PFN bitmap is modified to describe all of physical memory. 
RPBSL_PFNCNT stores the number of pages of physical memory. 


AUTHOR: 
Robert L. Rappaport, creation date 10-Oct-1983 
REVISION HISTORY: 
v03-002 RLROOO! Robert L. Rappaport 6-Apr-1984 
Several modifications. 1) Test for BROKE bit, and do NOT 
fest memory if set; 2) Clear error bits in CSR1 and CSR2; 


) move replacement of Machine Check handler from loop; 
4) PUSHL original Machine Check handler addr and POPL it 
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135 -SBTTL Declarations 
} F DEFAULT DISPLACEMENT, WORD 
1 : 
i gi 3 Macros to describe VMS data structures 
1 ° 
0 1 $ SBIICDEF 3 pire wogreners 
00 1 8 $BIMEMDEF 3; BI Memory regiet 
0 1 SDMPDEF 3 Sys See dump ite. header definitions 
. 1 ? SIOBSSDEF : 11/8SS definitions 
1 SNOTDEF 3: Nexus device fypes 
0 1 § SPRDEF : Processor registers 
00 1 SPRBESSDEF 3 cru Specific Processor registers 
000 134 SRPBDEF ; Restart parameter block 
000 135 SBUADEF r BI-UNIBU adapter 
000 1 § 
0000 1 ; 
4 138 : Macros 
B33 1 
0000 141 -MACRO ERROR,STR 3; Outputs an error string to the 
0000 13 BSBW ERROUT : console terminal. 
0000 14 ASCIZ STR 
B208 1¢3 NDM ERROR 
00000000 146 -PSECT YBTMEM,LONG 


c_m 
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«SBTTL CHECKMEM_8SS, Identify 11/8SS memory 


Cc 
on 


BIMEMBSS = Conti 
vO4= ; ECKMEA 


ne 


S 


p++ 
3 CHECKMEM_8SS, Locate and test memory for 11/8SS 


CHECKMEM_8SS:: 3; Entry for 11/8SS. 
: Start Cost ing slot poererene to find adapters. First save the stack 
3 position so it can be restored after a machine check. 
INIT SEARCH: ; Start searching for adapters 
; Save original machine check handler address on stack. 
PUSHL  4(R7) : Save original handler address. 
5 b0 MOVL SP,FP 3; Save current top of stack. 


Set up the Cysteat address of the ist slot on the system bus and 
the address of the adapter type table. 


MOVAB afl 


54 20000000 9F 9€ #10 
5c «10 MOVZBL #108 


oF tf tig IOBASE ,R4 3; Get address of ist slot. 


SSAL_RNEX AP : Set up NEXUS Loop counter. 


oh this memory locate and test loop, the following registers are 
used: 


RO - the contents of the slot's configuration register 
R4 - address of the configuration register at the current 
slot position 
R7 - address of the SCB / 
Ro - bit setting in memory present map; 
starting page number in this controller 
R10 - address of the memory description List in RPB (pagcnt & pfn) 
R11 - address of the RPB 


Initialize R10 (RPB memory descripter List pointer) for search loop 
MOVAB RPBSL_MEMDSC(R11),R10  ; Set pointer to memory description List 


f 
M 
0 
04 A7 DD O 
D «SE 0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
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OOO OO OO O09 0909 09 09 09 C9 09 09 69 SII NINN NIA AAAAAAAA AMMAN MNIIIUIUIE & 
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BICL #<RPBSM_MPM ' RPBSM_USEMPM | RPBSM FINDRERD = 
RPBSL_BOOTRS(R11) 3; Clear all MA780-specific boot flags 
TRY_NEXUS_8SS: ; Memory locate and test loop. 


: Set up a machine check fault handler to gain control if the main loop 
3; here addresses a non-existent configuration vogtover (an empty slot). 
3; Note we do this within the so0p since we re-set to another machine 

3; check handler Later on in the loop. 
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CHECKMER BSSe ddenti ty 1i)85¢ monary 2rREEi18bs 33:68:58 Fabre ResGemtRascoman:1 P29 (8), 
04 A? 6D'AF OE 1 5 MOVAB B8“*DO_NEXT_8SS41,4(R7) ; Set up fault handler (+1 for 
$ ; handler execution on the 
3 interrupt stack). 
09 ; Then read the slot's configuration register. 
50 64 00 12 MOVL (R4) ,RO 3; Read CR at current slot. 
0 13 ; 
0 14 ; Execution continues here if the configuration register is present. 
15 ; If the adapter type is a memory controller, proceed to test memory. 
1 : Otherwise, move to the next BI slot. 
a 
08 =F 09 5 0 EXTZV #BIlICSV_MEMNODE,- ; Extract sub-field of BI devtype 
50 50 07 027 1 #BIICSS_MEMNODE,RO,RO ; field that tells if we have memory. 
40 12 33 "7 § BNEQ DO_NEXT_8SS ; No, advance to next slot. 
09 3 ¢ 3; Here check BROKE bit to see if memory passed self test. 
50 0100 C4 dO 8 C 8 MOVL BIMEMSL_CSR1(R4),RO 3; Read CSR eqntetatng BROKE bit. 
0c EO 0031 BBS #BIMEMSU _BROKE,- : If BROKE, ignore this node. 
37 50 oate : RO,DO_NEXT_8SS 
onee 3 3 Memory controller found: 
50 20 A4 DD 0035 3 MOVL BIICSL_SAR(R4) ,RO ; RO = Starting Address for this memory. 
51 24 A464 Dd it 4 ; MOVL oi ics EAR(R4),R1 3; R1 = Ending Address for this aqnery 
59 50 17 9 003D 4 ROTL #<32-95,R0,R9 : Equivatens of ASHL #-9,RO,R9. Result 
Boe} $2 : _is starting PFN to R9. 
53 51 50 C3 0041 $ SUBL3 RO,R1,R3 ; R3 = Length of memory segment in bytes. 
53 53 17 9C 0045 3 OTL #<32-$>,R3,R3 3 Equivalent of ASHL #-9,R5,R3. Result 
9b 3 ; is # of pages to R3. 
8A 53 00 $049 40 MOVL R3,(R10)+ ; Save # of pages in this memory 
poet 41 ASSUME DMPS$V_TR EQ 24 
04C ri} ASSUME DMP$ EQ 
FF AA 10 90 pee 4 ove #1OBSSSA, NNEX,-1(R10) =; Compute the TR number for this 
FF AA SC 8 05 44 SUBB P,-1(R10) 3 memory and store in descriptor 
8A 59 OD O23 4g MOVL R9,(R10)+ : Save starting PFN for this memory 
057 47; 
p25 $8 ; Before starting memory test, establish a page skipping handler for 
57 49 ; machine checks, and turn off the cache so that writes followed by 
057 50 ; reads to nenory don't write to memory and then read from the cache. 
bes 5 ; Also, enable CRD error reporting if requested by the RPB BOOTRS flag. 
57 353° 
04 A? OOB9'CF 9E 037 4 MOVAB PAGE_MCHECK_8SS+1,4(R7) ; Set age skipping handler (+1 
50 5 : for interrupt stack). 
9 DA O3¢ § MTPR 4 SS$F, CADR_D.= ; Turn off memory cache. 
52 0088°CF 43 $0 38 MOVAB TEST_QUAD 8SS,R2 ; Page test routine address 
ene 3 6 5 BSBW BOOSTEST AEM 3 Test the specified range of PFN's 
0 2 ¢ BRB DO_NEXT_8SS ; Do the next controller if any 
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CHECKMER- BSS entity 15558 aeasry pa iets 1 g 64:53 Yeoors sre STMERBSS MAR: 1 _ (3) 
-ALIGN LONG ; Longword-aligned handler. 


3; Fault handler for non-existent configuration register. or unreadable 
registers, or a non-memory controller slot device. Restore stack 
pointer, clear all errors, and try for another slot if any remain. 


POPOIPITOPIPUIPIPIPIAININININININININININY = 


WN 9 OONAUS WN $0 OONAUSWN (OOONAULS UT = 


6 
6 
6 
6 
6 
5 DO_NEXT_8SS: : Skip to next slot. 
5D 600 7 MOVL SP : Restore stack pointer. 
8F DA 00 7 MTPR #1, #PRS_MCESR ; Clear any faults. 
gs H: 6 7 MOVAB IO8SSSAL~PERNEX(R4),R4 : Move fo next slot. 
c Ff f SOBGTR AP,TRY_NEXUS_8SS : If still a slot, loop. 
0 76 ; 
4 i 3; Reestablish the normal machine check fault handler. 
0 79 ° 
0 8 ASSUME PRBSSS$V_CADR_D EQ 0 
DA 00 & MTPR #0, #PRESS$_CADR : Re-enable cache. 
A7 8EDO 00 8 POPL 4(R7) 3 Restore original handler address. 
A 04 00 8 CLRL (R10)+ : Indicate end of RPB memory descr List 
05 > : RSB : Return to main routine. 


; advance to next quadword. 


e 
; subsequent read instruction, then execution continues below. Otherwise 
; execution goes to the fault handler. 


OV990 908 PK 09069009 69 696969 09 G9 69 G9 G9 G9 C9 09 C9 C9 C9 OD C9 69 C9 69 C9 09 O98 IU SMI MM MMMM OA RHAArAMAAMMOMOM LD 


| 
| 
| 
| 
| 
0 p++ | 
0 4 3 
8p 4 3; Functional Description: 
8 | : Test a page of 8SS memory, | 
38 ; ; Calling Sequence: 
0 9% : JSB TEST_QUAD_8SS 
088 596 ; Input 
3 Inputs: 
0 3 3 “es 
00 98 ; RO = starting address to test 
00 99 ; R1 = Quad word iteration count (64) 
89 00 ; R4 => Node Registers | 
00 3 ; R1l1= Address of RPB 
00 88 : Outputs: 
008 04 ; 
0 82 : Returns via RSB if the entire page is OK | 
3 09 : Error exit via Machine Check code to BOOSPAGE_MCHECK | 
oe | 
3 10 TEST_QUAD_8SS: : Test 1 quadword at a time. | 
60 7¢ 00 11 cCra (RO) : Clear a quadword. 
80 01 3 \¢ CMPL (RO)+,(RO)+ ; Read both longwords, and | 
14 e | 
i 
13 
18 


: If no gross errors occur in the clear to the quadword or in th 
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SOBGTR R1,TEST_QUAD 
MOVL = BIA 


5$: RSB 


L 11 


RI BIMERSL Cs 
BIMEMSL, CORSE 


R1,BIMEMSL_CSR2(R4) 
#RPBSV CROTEST - 


RPBS$L_BOOTRS(R11),10$ 
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Continue clearing unless done. 

Read memory e 

Re-write (write 1 to clear) CSR1. 

Read memory CSR2 and retain value 
in R1 for later testing CRD bit. 

Re-write (write 1 to clear) CSR2. 

Branch if CRD test is requested. 


; Check if a CRD error occurred on this page. 


ios: 


BITL 
BEQ 


#BIMEMSM_CROLOGR,R1 
ERR_EXIT_8SS 


«ALIGN LONG 


fest if CRD errors encountered. 


* Branch if no CRD error occurred. 


Else take error path. 
ALL handlers longword-aligned. 


Handler that gains control when a page has gross memory errors. Just 


: clear the error, recover the stack top, 


PAGE _MCHECK_8SS: 
Move 


6 
END 


ERR_EXIT 
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TPR 
8SS: 
Rw 


BIMEMSL_CSR1(R4) 
R1 ,BIMEMSL_CSR1( 
BIMEMSL CSR2(R4) 
R1 BIMEMSL_CSR2¢ 
#-{, #PRS_MCESR 


BOOSPAGE _MCHECK 


Re 
aR 
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1 
) 
1 
R4) 


and advance to the next page. 


Handle machine check. 

Read memory CSR1. ‘ 
Re-write (write 1 to clear) CSR1.- 
Read memory CSR2. 

Re-write (write 1 to clear) CSR2. 
Clear error indicator. 


Exit to common bad page code 
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re 


Initialization 
Command processing 


Pass 
— table sort 
Symbol table output 


Psect synopsis output 
Cross-reference output 
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100 
eae 
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000 eC R 0 
0000003 R 0 
444544 R 0 
= 444 
= 0000001 
= 00002000 
0000088 R 02 
= 44 6404 
= 00000001 
= 444 44 
= 444 44 
= 00000030 
= 0000008C 
= 00004000 
= 00000800 
= 4d 4 
= 0000001 
00000088 R 02 
0000001D R 02 
ee me ce co ee + 
! Psect synopsis ; 
Allocation PSECT No. Attributes 
00000000 <( 8-3 00 ¢ 0.) NOPIC  USR 
00000000 ( -)» Q1 1.) NOPIC USR 
000000D6 ( 214.) 02 ¢( 2.) NOPIC  USR 
teow awrr nwo mosnnenawmneaonae 
: ; Performance indicators ! 
Page faults CPU Time Elapsed Time 
29 00:00:00.07 1 81 
118 :00: ai) B08 {3 
234 200: 38 2.60 
* i fe 
; £30; 0:03 0:00:02 
0 0:00:00. :00.0 
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CON 
CON 
CON 


ABS 
ABS 
REL 


LCL N 
LCL NOSH 
LCL NOSHR 


EXE RD 


OSHR NOEXE NORD a NOVEC BYTE 
HR EXE RD 


T NOVEC BYTE 


UR NOVEC LONG 


fal) 
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VAX-11 Macro Run Statistics 


Assembler run totals 464 00:00:09.48 00:00:28.06 


{he working tet Limit was 1350 pages. - 
5196 bytes (69 pages) of virtual memory were used to buffer the intermediate code. 
There were 40 pages of symbol table space allocated to hold 631 non-local gnd local symbols. 
353 source lines were read in Pass 1, producing 13 object records in Pass 2. 

pages of virtual memory were used to define 17 macros. 


goer emeanmocess see emacaanaaes + 


! Macro Library statistics ! 


Fame enow enw ocr ee enn sete eon} 


Macro Library name Macros defined 
Ritts $ BOOTS .OBJJBOOTS.MLB; 1 0 
.5255$0UA28: CSYS.OBJIJLIB.MLB; 1 6 
$255$DUA28: CSYSLIBISTARLET.MLB; 2 7 
TOTALS (all Libraries) 13 


719 GETS were required to define 13 macros. 
There were no errors, warnings or information messages. 
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